(delete-key-deletes-forward-mode): Treat ms-dos and

windows-nt as windowed environments, even under -nw.

diff --git a/lisp/simple.el b/lisp/simple.el
index ed642184d8f7c7892184d8fc6c7bf9eeaf82ab34..b145a4a0f928e6a8bcd896cac55120970fac047a 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -4050,7 +4050,8 @@ For more details, see `delete-key-deleted-forward'."
            (> (prefix-numeric-value arg) 0)
          (not delete-key-deletes-forward)))
 
-  (cond ((memq window-system '(x w32 mac))
+  (cond ((or (memq window-system '(x w32 mac pc))
+            (memq system-type '(ms-dos windows-nt)))
         (if delete-key-deletes-forward
             (progn
               (define-key global-map [delete] 'delete-char)